home *** CD-ROM | disk | FTP | other *** search
/ IRIX Base Documentation 2001 May / SGI IRIX Base Documentation 2001 May.iso / usr / share / catman / p_man / cat3 / libblas / axpy.z / axpy
Encoding:
Text File  |  1998-10-30  |  6.4 KB  |  133 lines
  1.  
  2.  
  3.  
  4. ____AAAAXXXXPPPPYYYY((((3333FFFF))))                                                            ____AAAAXXXXPPPPYYYY((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      daxpy, saxpy, zaxpy, caxpy - BLAS level ONE axpy subroutines
  10.  
  11.  
  12. FFFFOOOORRRRTTTTRRRRAAAANNNN 77777777 SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  13.      ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee ddddaaaaxxxxppppyyyy(((( nnnn,,,, aaaa,,,, xxxx,,,, iiiinnnnccccxxxx,,,, yyyy,,,, iiiinnnnccccyyyy ))))
  14.      iiiinnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, iiiinnnnccccyyyy,,,, nnnn
  15.      ddddoooouuuubbbblllleeee pppprrrreeeecccciiiissssiiiioooonnnn  aaaa
  16.      ddddoooouuuubbbblllleeee pppprrrreeeecccciiiissssiiiioooonnnn  xxxx(((( 1111 )))),,,, yyyy(((( 1111 ))))
  17.  
  18.      ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee ssssaaaaxxxxppppyyyy(((( nnnn,,,, aaaa,,,, xxxx,,,, iiiinnnnccccxxxx,,,, yyyy,,,, iiiinnnnccccyyyy ))))
  19.      iiiinnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, iiiinnnnccccyyyy,,,, nnnn
  20.      rrrreeeeaaaallll              aaaa
  21.      rrrreeeeaaaallll              xxxx(((( 1111 )))),,,, yyyy(((( 1111 ))))
  22.  
  23.      ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee zzzzaaaaxxxxppppyyyy(((( nnnn,,,, aaaa,,,, xxxx,,,, iiiinnnnccccxxxx,,,, yyyy,,,, iiiinnnnccccyyyy ))))
  24.      iiiinnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, iiiinnnnccccyyyy,,,, nnnn
  25.      ccccoooommmmpppplllleeeexxxx****11116666        aaaa
  26.      ccccoooommmmpppplllleeeexxxx****11116666        xxxx(((( 1111 )))),,,, yyyy(((( 1111 ))))
  27.  
  28.      ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee ccccaaaaxxxxppppyyyy(((( nnnn,,,, aaaa,,,, xxxx,,,, iiiinnnnccccxxxx,,,, yyyy,,,, iiiinnnnccccyyyy ))))
  29.      iiiinnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, iiiinnnnccccyyyy,,,, nnnn
  30.      ccccoooommmmpppplllleeeexxxx           aaaa
  31.      ccccoooommmmpppplllleeeexxxx           xxxx(((( 1111 )))),,,, yyyy(((( 1111 ))))
  32.  
  33.  
  34. CCCC SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  35.      vvvvooooiiiidddd ddddaaaaxxxxppppyyyy(((( nnnn,,,, aaaa,,,, xxxx,,,, iiiinnnnccccxxxx,,,, yyyy,,,, iiiinnnnccccyyyy ))))
  36.      IIIInnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, iiiinnnnccccyyyy,,,, nnnn;;;;
  37.      ddddoooouuuubbbblllleeee            aaaa;;;;
  38.      ddddoooouuuubbbblllleeee            ((((****xxxx))))[[[[ nnnn ]]]],,,, ((((****yyyy))))[[[[ nnnn ]]]];;;;
  39.  
  40.      vvvvooooiiiidddd ssssaaaaxxxxppppyyyy(((( nnnn,,,, aaaa,,,, xxxx,,,, iiiinnnnccccxxxx,,,, yyyy,,,, iiiinnnnccccyyyy ))))
  41.      IIIInnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, iiiinnnnccccyyyy,,,, nnnn;;;;
  42.      ffffllllooooaaaatttt             aaaa;;;;
  43.      ffffllllooooaaaatttt             ((((****xxxx))))[[[[ nnnn ]]]],,,, ((((****yyyy))))[[[[ nnnn ]]]];;;;
  44.  
  45.      vvvvooooiiiidddd zzzzaaaaxxxxppppyyyy(((( nnnn,,,, aaaa,,,, xxxx,,,, iiiinnnnccccxxxx,,,, yyyy,,,, iiiinnnnccccyyyy ))))
  46.      IIIInnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, iiiinnnnccccyyyy,,,, nnnn;;;;
  47.      ZZZZoooommmmpppplllleeeexxxx           aaaa;;;;
  48.      ZZZZoooommmmpppplllleeeexxxx           ((((****xxxx))))[[[[ nnnn ]]]],,,, ((((****yyyy))))[[[[ nnnn ]]]];;;;
  49.  
  50.      vvvvooooiiiidddd ccccaaaaxxxxppppyyyy(((( nnnn,,,, aaaa,,,, xxxx,,,, iiiinnnnccccxxxx,,,, yyyy,,,, iiiinnnnccccyyyy ))))
  51.      IIIInnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, iiiinnnnccccyyyy,,,, nnnn;;;;
  52.      CCCCoooommmmpppplllleeeexxxx           aaaa;;;;
  53.      ccccoooommmmpppplllleeeexxxx           ((((****xxxx))))[[[[ nnnn ]]]],,,, ((((****yyyy))))[[[[ nnnn ]]]];;;;
  54.  
  55.  
  56. DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
  57.      ddddaaaaxxxxppppyyyy, ssssaaaaxxxxppppyyyy, zzzzaaaaxxxxppppyyyy, and ccccaaaaxxxxppppyyyy compute a constant aaaa times a vector xxxx plus
  58.      a vector yyyy. The result overwrites the initial values of vector yyyy.
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70. ____AAAAXXXXPPPPYYYY((((3333FFFF))))                                                            ____AAAAXXXXPPPPYYYY((((3333FFFF))))
  71.  
  72.  
  73.  
  74.          Y <--- Y + a . X
  75.  
  76.      iiiinnnnccccxxxx and iiiinnnnccccyyyy specify the increment between two consecutive elements of
  77.      respectively vector xxxx and yyyy.
  78.  
  79.  
  80. AAAAUUUUTTTTHHHHOOOORRRRSSSS
  81.           Jack Dongarra, linpack, 3/11/78.
  82.  
  83.  
  84.  
  85.  
  86.  
  87.  
  88.  
  89.  
  90.  
  91.  
  92.  
  93.  
  94.  
  95.  
  96.  
  97.  
  98.  
  99.  
  100.  
  101.  
  102.  
  103.  
  104.  
  105.  
  106.  
  107.  
  108.  
  109.  
  110.  
  111.  
  112.  
  113.  
  114.  
  115.  
  116.  
  117.  
  118.  
  119.  
  120.  
  121.  
  122.  
  123.  
  124.  
  125.  
  126.  
  127.  
  128.  
  129.                                                                         PPPPaaaaggggeeee 2222
  130.  
  131.  
  132.  
  133.